PC-Blue - MS DOS Public Domain Library

home *** CD-ROM | disk | FTP | other *** search
/ PC-Blue - MS DOS Public Domain Library / PC-Blue MS-DOS Public Domain Library - NYACC.iso / vol061 / align.bas < prev next >
Unknown | 1987-01-13 | 2.0 KB
open in:
MacOS 8.1 |
Win98 |
DOS
view JSON data |
view as text

This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	GW-BASIC `(document/gwBasic)`	ext	Supported
`66%`	dexvert	GFA-BASIC Atari `(other/gfaBASICAtari)`	ext	Supported
`1%`	dexvert	Memotech MTX BASIC source `(document/memotechMTXBASICSource)`	ext	Unsupported
`1%`	dexvert	Amiga BASIC Protected File `(other/amigaBASICProtectedFile)`	ext	Unsupported
`1%`	dexvert	BAS VBDOS Pro 1.0 Source `(other/basVBDOSPro10Source)`	ext	Unsupported
`1%`	dexvert	Visual Basic Tokenized Source `(other/visualBasicTokenizedSource)`	ext	Unsupported
`1%`	dexvert	ZBASIC `(other/zbasic)`	ext	Unsupported
`100%`	file	data	default
`100%`	gt2	Kopftext: '5 ON KEY (13) GOSUB 250	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 35 20 4f 4e 20 4b 45 59 | 20 28 31 33 29 20 47 4f |5 ON KEY| (13) GO|
|00000010| 53 55 42 20 32 35 30 0d | 0a 36 20 4f 4e 20 4b 45 |SUB 250.|.6 ON KE|
|00000020| 59 20 28 31 32 29 20 47 | 4f 53 55 42 20 32 38 30 |Y (12) G|OSUB 280|
|00000030| 0d 0a 37 20 4f 4e 20 4b | 45 59 20 28 31 34 29 20 |..7 ON K|EY (14) |
|00000040| 47 4f 53 55 42 20 34 30 | 30 0d 0a 38 20 4b 45 59 |GOSUB 40|0..8 KEY|
|00000050| 20 28 31 34 29 20 4f 4e | 0d 0a 31 30 20 50 52 49 | (14) ON|..10 PRI|
|00000060| 4e 54 22 49 2e 42 2e 4d | 2e 44 49 53 4b 20 44 52 |NT"I.B.M|.DISK DR|
|00000070| 49 56 45 20 41 4c 49 47 | 4e 4d 45 4e 54 20 50 52 |IVE ALIG|NMENT PR|
|00000080| 4f 47 52 41 4d 22 0d 0a | 31 36 20 49 4e 50 55 54 |OGRAM"..|16 INPUT|
|00000090| 20 22 50 52 45 53 53 20 | 45 4e 54 45 52 20 54 4f | "PRESS |ENTER TO|
|000000a0| 20 43 4f 4e 54 49 4e 55 | 45 22 2c 41 24 0d 0a 32 | CONTINU|E",A$..2|
|000000b0| 30 20 44 4f 52 3d 26 48 | 33 46 32 3a 53 52 3d 26 |0 DOR=&H|3F2:SR=&|
|000000c0| 48 33 46 34 3a 46 44 3d | 26 48 33 46 35 0d 0a 33 |H3F4:FD=|&H3F5..3|
|000000d0| 30 20 4f 55 54 20 44 4f | 52 2c 33 32 0d 0a 34 30 |0 OUT DO|R,32..40|
|000000e0| 20 4f 55 54 20 44 4f 52 | 2c 33 37 0d 0a 35 30 20 | OUT DOR|,37..50 |
|000000f0| 4f 55 54 20 46 44 2c 33 | 0d 0a 36 30 20 4f 55 54 |OUT FD,3|..60 OUT|
|00000100| 20 46 44 2c 26 48 43 46 | 0d 0a 37 30 20 4f 55 54 | FD,&HCF|..70 OUT|
|00000110| 20 46 44 2c 37 3a 52 45 | 4d 20 52 45 43 41 4c 49 | FD,7:RE|M RECALI|
|00000120| 42 52 41 54 45 20 48 45 | 41 44 0d 0a 38 30 20 4f |BRATE HE|AD..80 O|
|00000130| 55 54 20 46 44 2c 31 0d | 0a 39 30 20 46 4f 52 20 |UT FD,1.|.90 FOR |
|00000140| 49 3d 31 20 54 4f 20 35 | 30 30 3a 4e 45 58 54 20 |I=1 TO 5|00:NEXT |
|00000150| 49 0d 0a 31 30 30 20 50 | 52 49 4e 54 20 22 48 45 |I..100 P|RINT "HE|
|00000160| 41 44 20 48 41 53 20 4e | 4f 57 20 52 45 43 41 4c |AD HAS N|OW RECAL|
|00000170| 49 42 52 41 54 45 44 20 | 54 4f 20 54 52 41 43 4b |IBRATED |TO TRACK|
|00000180| 20 5a 45 52 4f 22 0d 0a | 31 30 35 20 43 4c 53 0d | ZERO"..|105 CLS.|
|00000190| 0a 31 31 30 20 54 52 4b | 3d 30 0d 0a 31 32 30 20 |.110 TRK|=0..120 |
|000001a0| 50 52 49 4e 54 20 22 48 | 45 41 44 20 49 53 20 4e |PRINT "H|EAD IS N|
|000001b0| 4f 57 20 41 54 20 54 52 | 41 43 4b 20 22 3b 54 52 |OW AT TR|ACK ";TR|
|000001c0| 4b 0d 0a 31 33 30 20 50 | 52 49 4e 54 20 22 50 52 |K..130 P|RINT "PR|
|000001d0| 45 53 53 20 52 49 47 48 | 54 20 41 52 52 4f 57 20 |ESS RIGH|T ARROW |
|000001e0| 54 4f 20 53 54 45 50 20 | 49 4e 2c 20 50 52 45 53 |TO STEP |IN, PRES|
|000001f0| 53 20 4c 45 46 54 20 41 | 52 52 4f 57 20 54 4f 20 |S LEFT A|RROW TO |
|00000200| 53 54 45 50 20 4f 55 54 | 20 22 0d 0a 31 33 31 20 |STEP OUT| "..131 |
|00000210| 50 52 49 4e 54 20 22 4f | 52 20 50 52 45 53 53 20 |PRINT "O|R PRESS |
|00000220| 44 4f 57 4e 20 41 52 52 | 4f 57 20 54 4f 20 52 45 |DOWN ARR|OW TO RE|
|00000230| 43 41 4c 49 42 52 41 54 | 45 22 0d 0a 31 34 30 20 |CALIBRAT|E"..140 |
|00000240| 4b 45 59 20 28 31 33 29 | 20 4f 4e 0d 0a 31 35 30 |KEY (13)| ON..150|
|00000250| 20 4b 45 59 20 28 31 32 | 29 20 4f 4e 0d 0a 31 36 | KEY (12|) ON..16|
|00000260| 30 20 4f 55 54 20 44 4f | 52 2c 33 37 0d 0a 31 37 |0 OUT DO|R,37..17|
|00000270| 30 20 4c 4f 43 41 54 45 | 20 31 2c 31 0d 0a 31 38 |0 LOCATE| 1,1..18|
|00000280| 30 20 47 4f 54 4f 20 31 | 32 30 0d 0a 31 39 30 20 |0 GOTO 1|20..190 |
|00000290| 45 4e 44 0d 0a 32 35 30 | 20 54 52 4b 3d 54 52 4b |END..250| TRK=TRK|
|000002a0| 2b 31 0d 0a 32 35 35 20 | 49 46 20 54 52 4b 3e 33 |+1..255 |IF TRK>3|
|000002b0| 39 20 54 48 45 4e 20 42 | 45 45 50 3a 54 52 4b 3d |9 THEN B|EEP:TRK=|
|000002c0| 33 39 0d 0a 32 36 30 20 | 47 4f 53 55 42 20 33 30 |39..260 |GOSUB 30|
|000002d0| 30 0d 0a 32 36 35 20 52 | 45 54 55 52 4e 0d 0a 32 |0..265 R|ETURN..2|
|000002e0| 38 30 20 54 52 4b 3d 54 | 52 4b 2d 31 0d 0a 32 38 |80 TRK=T|RK-1..28|
|000002f0| 35 20 49 46 20 54 52 4b | 3c 30 20 54 48 45 4e 20 |5 IF TRK|<0 THEN |
|00000300| 42 45 45 50 3a 54 52 4b | 3d 30 0d 0a 32 39 30 20 |BEEP:TRK|=0..290 |
|00000310| 47 4f 53 55 42 20 33 30 | 30 0d 0a 32 39 35 20 52 |GOSUB 30|0..295 R|
|00000320| 45 54 55 52 4e 0d 0a 33 | 30 30 20 4b 45 59 20 28 |ETURN..3|00 KEY (|
|00000330| 31 33 29 20 4f 46 46 3a | 4b 45 59 20 28 31 32 29 |13) OFF:|KEY (12)|
|00000340| 20 4f 46 46 0d 0a 33 30 | 31 20 4f 55 54 20 44 4f | OFF..30|1 OUT DO|
|00000350| 52 2c 33 37 0d 0a 33 30 | 35 20 4f 55 54 20 46 44 |R,37..30|5 OUT FD|
|00000360| 2c 31 35 0d 0a 33 31 30 | 20 4f 55 54 20 46 44 2c |,15..310| OUT FD,|
|00000370| 31 0d 0a 33 32 30 20 4f | 55 54 20 46 44 2c 54 52 |1..320 O|UT FD,TR|
|00000380| 4b 0d 0a 33 33 30 20 46 | 4f 52 20 49 3d 31 20 54 |K..330 F|OR I=1 T|
|00000390| 4f 20 35 30 3a 4e 45 58 | 54 20 49 0d 0a 33 34 30 |O 50:NEX|T I..340|
|000003a0| 20 52 45 54 55 52 4e 0d | 0a 34 30 30 20 4f 55 54 | RETURN.|.400 OUT|
|000003b0| 20 46 44 2c 37 0d 0a 34 | 31 30 20 4f 55 54 20 46 | FD,7..4|10 OUT F|
|000003c0| 44 2c 31 0d 0a 34 31 35 | 20 54 52 4b 3d 30 0d 0a |D,1..415| TRK=0..|
|000003d0| 34 32 30 20 46 4f 52 20 | 49 3d 31 20 54 4f 20 35 |420 FOR |I=1 TO 5|
|000003e0| 30 30 3a 4e 45 58 54 20 | 49 0d 0a 34 33 30 20 52 |00:NEXT |I..430 R|
|000003f0| 45 54 55 52 4e 0d 0a 1a | 00 00 00 00 00 00 00 00 |ETURN...|........|
|00000400| 1a 0d 0a 33 33 30 20 46 | 4f 52 20 49 3d 31 20 54 |...330 F|OR I=1 T|
|00000410| 4f 20 35 30 3a 4e 45 58 | 54 20 49 0d 0a 33 34 30 |O 50:NEX|T I..340|
|00000420| 20 52 45 54 55 52 4e 0d | 0a 34 30 30 20 4f 55 54 | RETURN.|.400 OUT|
|00000430| 20 46 44 2c 37 0d 0a 34 | 31 30 20 4f 55 54 20 46 | FD,7..4|10 OUT F|
|00000440| 44 2c 31 0d 0a 34 31 35 | 20 54 52 4b 3d 30 0d 0a |D,1..415| TRK=0..|
|00000450| 34 32 30 20 46 4f 52 20 | 49 3d 31 20 54 4f 20 35 |420 FOR |I=1 TO 5|
|00000460| 30 30 3a 4e 45 58 54 20 | 49 0d 0a 34 33 30 20 52 |00:NEXT |I..430 R|
|00000470| 45 54 55 52 4e 0d 0a 1a | 00 00 00 00 00 00 00 00 |ETURN...|........|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 1a 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000680| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000690| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000700| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000710| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+